#!/usr/bin/env perl

print 'cko_junklist={';

$s='';

while($x=<>) {
   chomp($x);
   $s.="\"$x\"," if ($x);
}
chop($s);
print $s."}"

